home *** CD-ROM | disk | FTP | other *** search
/ Scene Storm / Scene Storm - Volume 1.iso / coding / c / unix / src / link.c < prev    next >
Encoding:
C/C++ Source or Header  |  1992-07-19  |  245 b   |  17 lines

  1. #include "amiga.h"
  2.  
  3. int link(char *from, char *to)
  4. {
  5.   BPTR from_lock = Lock(from, ACCESS_READ);
  6.  
  7.   chkabort();
  8.   if (from_lock)
  9.     {
  10.       int ok = MakeLink(to, from_lock, 0);
  11.  
  12.       UnLock(from_lock);
  13.       if (ok) return 0;
  14.     }
  15.   ERROR;
  16. }
  17.